Red Eye Press Kit/Red Eye Press Kit.iso/pc/main.dxr/SCRIPTS_45_enlargeImage.ls

Text File | 2005-07-18 | 462 b | 23 lines

property xLib, bigList
global previewImage

on beginSprite me
  xLib = "ENLARGE"
  bigList = []
  repeat with x = 1 to the number of castMembers of castLib xLib
    bigList.add(member(x, xLib).name)
  end repeat
end

on mouseWithin me
  if previewImage <> VOID then
    sendAllSprites(#updatePreview, previewImage, "ENLARGE")
  end if
end

on mouseLeave me
  if previewImage <> VOID then
    sendAllSprites(#updatePreview, previewImage, "PREVIEWS")
  end if
end